FFFFFFFFFFEFFFFF DDDDDDDDDDDD 

FFFFFFFFFFFFFFF DDDDDDDDDDDD 

FFFFFFFFFFFFFFF DODDDDDDDDDDD 

FFF DDD DOD 
FFF DDD DOD 
FFF DDD DDD 
FFF DDD DDD 
FFF DDD DOD 
FFF DDD DDD 
FFFFFFFFFFFF DDD DDD 
FRFEFFFFFFFFE DDD DDD 
FFFFERFFFFFF DDD DOD 
FFF DDD DDD 
FFF DOD DDD 
FFF DDD DDD 
FFF DDD DOD 
FFF DDD DDD 
FFF DDD DDD 
FFF DDDDDDDDPDDD 

FFF DDDDDDDDDDDD 

FFF DDDDDDDDDDDD 
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**F 1LE**1D**FDLGENTAB 
FFFFFFFFFF DDDDDDDD LL GGGGGGGG EEEEEEEEEE NN NN TITTTTITTT AAAAAA BBBBBBBB . 
FFFFFFFFFF DDDDDDDD LL GGGGGGGG EEEEEEEEEE NN NN TTTTTTTTTT AAAAAA BBBBBBBB ; 
FF DD DD LL GG EE NN NN TT AR AA 6B BB 
FF DD DD LL GG EE NN NN TT Aa AA 6B 8B 
FF DD DD LL GG EE NNNN NN TT Aa AA 6B 6B 
FF DD DD LL GG EE NNN N TT AA AA 6B BB 
FFFFFFFF DD DD LL GG EEEEEEEE NN NN NN TT Aa AA 88888888 
FFFFFFFE DD DD LL GG EEEEEEEE NN NN NN TT AA AA ®88BB8BBBB 
FF Ob DD LL GG GGGGGG EE NN NNN TT AAAAAAAAAA BB BB 
FF DD DD LL GG GGGGGG EE NN NNNN TT AAAAAAAAAA BB BB 
FF DD DD LL GG GG EE NN NN TT Aa AA BB BB cece 
FF dD DD LL GG GG EE NN NN TT AA AA 6B BB coce 
FF DDDDDDDD LLLLLLLLLL GGGGGG EEEEEEEEEE NN NN TT AA AA 88886888 cows 
FF DDDDDDDD LLLLLLLLLL GGGGGG EEEEEEEEEE NN NN TT AB AA B68BBBBBB cece 


LL III SSSSSSSS 
LL III SSSSSSSS 

LL 1 $$ 

LL 11 $§ 

LL 1] SS 

LL 1 $$ | 
LL 1 SSSSSS | 
LL 1 SSSSSS 

LL 1 $$ 

LL 1 SS 

LL 1 $5 

LL 1 $$ 
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0001 ZTITLE ‘VAK-11 FDL Utilities’ 3 
Boe MODULE FOLGENTAB ( IDENT="V04- $ 
000 4 tt De MODE ( EXTERNAL = GENERAL ), ; 
0004 OPTLEVE ; 
0005 ) sz 3 
Bene 0 3 
0008 J 
0009 1 SRR RRA AAEE RARER AEE AEA AAAA AAA A ARETE TEETER E EEE ; 
0010 1 !# + 3 
0011 1 !* COPYRIGHT (c) 1978, 1980, 1982, 1984 8 * 3 
01 1 '® DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. * : 
SF : * ALL RIGHTS RESERVED. * ; 
'« & | e 
015 1 !* THIS bee * 4 FURNISHED wae A LICENSE AND MAY BE USED AND sagt * , 
016 1 !* ONLY IN ACCORDANCE WITH THE TERMS SUCH LICENSE AND WITH THE we 
017 1 !* INCLUSION OF THe ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR Y TH * 
018 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
019 1 '* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
O5t : 7 TRANSFERRED. % 
‘@ " a 
Oce 1 !* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
002 1 != AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
Bose ; 7 CORPORATION. * 
® ® 
0026 1 !* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
0027 1 !* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 
0028 1 !« * 
0029 1 !« * 
0030 1 SRR RA REE REE RE PERERA REAR ARETE EEA AHE RAAT ARERER AE AAEAAEAAAE ee ee eee 
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VAX-11 FOL Utilities 16-Sep-1984 01:44:14 AX-i1 Ol i geere V4.0-742 Page 2 
14-Sep-1984 12:31:18 FDL. SRCIFOLGENTAB.B32;1 (2). 
031 1 !4 3 
0 ¢ a : 
? : Facility: VAX=11 FDL Utilities ‘ 
0035 1 | Abstract: ; 
0036 1! Callable routines : 
0037 1! F 
0038 1 ! Contents: : 
0039 1! FDOLSAB_~2!_TABLE : 
0040 1! FDLS$AB_SEC_TABLE . 
0041 1! ; ; 
Boog 1 ! Environment: ; 
045 1! 
0044 1! VAX/VMS Operating System 
0045 1! | 
0046 1 !-- 
0047 1 
0048 1! 
BpeR | Author: Ken F Henderson Jr Creation Date 2 Dec 1982 
0051 1! 
R236 1 ! Modified by: 
0053 1! 
0054 1! v03-006 RRBO015 Rowland R. Srasiey 29 Feb 1984 
Bees ' } Comment and delete references to ACLs and FABSV_EDL 29 
0057 1! v03-005 KFHO004 Ken Henderson 26 Sep 1983 
Be8 : } Fix generation of Sharing primary bits. 
0060 1! V03-004 KFHOO03 Ken Henderson 10 Sep 1983 
BRes : Support for named UICs 
0063 1! v03-003 KFHOO002 n Henderson 29 Jul 1983 
se : Added DEFERRED “WRITE. ERASE °ON. DELETE 4F 
0066 1! v03-002 KFHOO01 Ken Henderson 15 Dec 1982 3E 
0067 1! SYSTEM and IDENT primaries finished 
0069 1 | a3 
eeee 
49 
45 
3€ 
49 
59 
41 
53 
4F 
4F 
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VAX-11 FDL Utilities 16-Sep-1984 01:44 14 
14-Sep-1984 12:31:18 FDL. SRC 

0070 1 PSECT 

071 1 OWN = _FDLSOWN (PIC), 

076 1 GLOBAL = “FDL$GLOBAL (PIC) 

073 1 PLIT = “FDL$PLIT (SHARE ,PIC), 

0074 CODE = “FDLSCODE (SHARE PIC): 

0076 1 LIBRARY 'SYSSLIBRARY:STARLET’; 

0 77 1 REQUIRE ‘SRC$:FDLUTIL’; 

0 62 REQUIRE ‘LIB$:FDLPARDEF'; 

080¢ 1 GLOBAL 

0805 FDLS$AB_PR1_TABLE 

0805 BLOCKVECTOR C FDLSC_PRITAB_SIZE, FOL$C_PRIBLK_SIZE J FIELD (PRITAB_FIELDS) 

0807 PRESET ( 

0809 C FDLSC_ACCESS, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC “ACCESS' ), 
Bit 'C FOLSC_ACL, FDLSV_PRI_FAO J = UPLIT BYTE ( ZASCIC "ACL" ), 
gas 1 { FOLSC_AREA, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC ‘AREA !UB" ), 
0814 1 C FDLSCTAREA, FDL$V~PRI~BOFF J = $BYTEOFFSET ( XABSB_AID ), 

0815 FDLSC"AREA, FDLSV-NUM-ATTACH J = SET, 

0817 C FDLSC_CONNECT, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC "CONNECT’ ), 
0819 C FDLSC_DATE, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC 'DATE’ ), 
0821 C FDLSC_FILE, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC ‘FILE’ ), 
0858 1 C FDLSC_IDENT, FDL$V_PRI_FAO J] = 
0824 1 UPLIT BYTE ( ZASCIC "IDENT! _''+!AS | VAX/VMS FDLSGENERATE Routine’ ), 
0825 { FDLSC_IDENT, FDL$V_IDENT-STR J z . 
0827 C FDLSC_JNL, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC 'JOURNAL’ 
0829 1 C FDLSC_KEY, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC "KEY !uB’ ), 
0830 1 C FDLSC7KEY. FDL$/~PRI~BOFF } = $BYTEOFFSET ( XABSB_REF ), 
0851 FDLSC"KEY, FDLS¥-NUM-ATTACH J = _SET, 

0838 C FDLSC_RECORD, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC "RECORD ), 
0835 C FDL$C_SHARING, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC "SHARING ), 
0837 { FDLSC_SYSTEM, FDLSV_PRI_FAO J = UPLIT BYTE ( %ASCIC ‘SYSTEM’ ) 
0839 1», 
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DTYPE WHICH BTYPE 
I C 
I C 
I C 
I C 
I C 
I C 
I C 


FULL 
E 
E 
E 
E 
E 
E 
E 


FAO 


FDLSAB_SEC_TABLE 
BLOCKVECTOR C FOLSC_SECTAB_SIZE, FDLSC_SECBLK_SIZE J] FIELD (SECTAB_FIELDS) 


ACCESS PRIMARY 
SEC 
A 
A 
A 
A 
A 
A 
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le 
ACL PRIMARY 


SEC FAO 


'GENTAB( ACE, 


"1 !24<ENTRY!>!AS", 
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FULL DTYPE WHICH BTYPE BOFF 


_CLEAR, STRING, ACL, XAB,  L_NXT ), 


——————————_—_ i i ————“- 
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| ¥b6"500 12-308 1980 OF gti le DL. SREIFDLGENTAB B32, . 


s 151 568 1 t¢ 

3 : ¢ ef : ; AREA PRIMARY 

: 154 i 1; SEC FAO FULL DTYPE WHICH TYPE  BOFF 

s 155 872 1! 

4 $ 75 1 te 

eS 74 «1 

: 158 875 1 GENTAB( ALLOC, '! = {BESALLOCATION:3 2b CLEAR, LONG, AREA, XAB, L_ALQ), 
> 159 P 0876 1 GENTAB( BICONT, '!~i24<BEST_TRY CONT 1GUO0S Pi ac’ 

: 160 0877 1 a SuITCH, AREA, XAB, VV CBT ), 
: 161 0878 1 GENTAB( BKT "! 1 24<BUCKET SIZE! > 1UBts AC LEAR, BYTE REA, XAB,  B7BKZ ), 
: 16¢ 0879 1 GENTAB( CONTG, “4 “i d4<CONTIGOOUS!>!A EAR, SWITCH, AREA, XAB,  V-CTG ). 
: 16 P 0880 1 GENTAB( EXACT. iSccERACT oot zoningtot TAC’, 

: 164 0881 1 “CLEAR, SWITCH, AREA, XAB,  V_HRD ), 
> 165 0882 1 GENTAB( EXTND, '! ~ 1OGCERTENSION!>!Uy" “CLEAR, WOR REA, AB,  WIDEQ ), 
> 166 0883 1 GENTAB( POS], ‘!"'16<POSITION!>!AS', “CLEAR. SPECIAL,AREA. XAB.  B7ALN), 
: 167 0884 1 GENTAB( VOLU, ‘!"i24<VOLUME!>iuw’, © “CLEAR. WORD, AREA, XAB,  WTVOL ), 


| 
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LGENTAB VAX=11 FDL Utilities Bese 
-000 14-Se 
169 0885 1 !+ 
170 886 1 i CONNECT PRIMARY 
a or , 

173 0889 1 i = 
174 0890 1 i- 
175 0891 1 
176 089¢ 1 GENTAB( ASY, —'!_!24<ASYNCHRONOUS!>!AC’, SET, 
177 0893 1 GENTAB( BIO "iMiDG<BLOCK_IO!>IAC', | 

178 0894 1 GENTAB( BUCODE, *!"! 24<BUCKET CODE!>!UL'7_SEf, 
179 0895 1 GENTAB( RCTX, ‘ii Q4<CONTEXT!>!uL', ‘SET 

180 0896 1 GENTAB( EOF "iT 1QG<END OF FILE!>!ac'y Sef 
181 0897 1 GENTAB( FLOA, ‘ii dac<FILC_BOCKETS!>!AC's Sef, 
18 0898 1 GENTAB( FDEL, ‘'!~!24<FAST-DELETE!>!AC', SET, 
188 P 0899 1 GENTABC KRF,” "17! 4<KEY_OF REFERENCE !57U8", 
185 P 0901 GENTAB( KGE, '!_!24<KEY_GREATER_EQUALT>/AC’, 
187 P0903 1 GENTAB( KGT,  ''!_!24<KEY_GREATER_THAN!S'AC', 
188 0904 1 % 

189 0905 1 GENTAB( KLIM,  '!_!24<KEY_LIMIT!>!AC', ~ 

190 0906 1 GENTAB( LOCMODE,'!7!24<LOCATE MODE!>!aC'y Sef 
191 0907 1 GENTABC REA, '!! 24<LOCK_ON_READ!>!AC‘T Sef 
192 0908 1 GENTAB( RLK,  '!~!24<LOCK“ONTWRITE!>!AC'? SET, 
193 P 0308 ! GENTAB( ULK, "ta t@G<MANUAL ONLOCKING:> AC* 
195 p 0911 1 GENTAB( MBC, *!_!24<MULTIBLOCK_COUNT!5 UB", 
197 P 0913 1) GENTAB( MBF. *!_!24<MULTIBUFFER_COUNTT> UB", 
199 0915 1 GENTABC NLK,  '!_!24<NOLOCK!D>!AC', | “SET. 
300 P 0916 1 GENTAB( NAR, * ETIQG<NONEXISTENT_RECORD!> AC", 
202 0918 1 GENTAB( RAH,  '!_!24<READ_AHEAD!>!AC', “SET. 
205 P 0919 1 GENTAB( RRL, *ETL24<READ REGARDLESS! 5TAC 
205 P 0921 1} GENTAB( TMENB, *!!24<TIMEOUT ENABLE !>!AC’ - 
207 P 0923 1) GENTAB( TMO, *!_124<TIMEOUT_PERIOD!>!0B', 
209 P 0925 } GENTAB( TPT, "!_124<TRUNCATE_ON_PUT!>TAC’. 
211 P 0927 1 GENTAB( TTCCO, '!_!24<TT_CANCEL_CONTROL~0!>!AC* 
31g 0928 1 SET, 
21 P 0929 1 GENTAB( TICVT, ‘!_!24<TT_UPCASE_INPUT!>TAC’, 
214 0930 1 “SET. 
215 0931 1 GENTAB( TIPMT, ‘°!_!24<TT_PROMPT!>!AC', “SET 
216 P 09 GENTAB( TIPTA, *TTE2G<TT_PURGE_TYPE_AHERD!> Ac’ 
38 P 0934 GENTAB( TTRNE, *!124<TT_READ_NOECHO!> KC’ 7 
320 P 0956 } GENTAB( TTRNF, "1 124<TT_READ_NOFILTER!S'AC, 

32 0938 1 GENTAB( UIF, —$!_!2G<UPDATE_IF!>!AC*. “SET, 

33 P 0939 1 GENTAB( WAT, = ' iT! 4<WAIT_FOR_RECORD!>TAC'. 

25 0941 1 GENTAB( WBH, = '!_!24<WRITE_BEHIND!>!AC*, SET, 


BYTE, 
SWITCH, 


SWITCH, 
SWITCH, 
SWITCH, 
SWITCH, 
BYTE, 


BYTE, 
SWITCH, 


SWITCH, 
SWITCH, 


SWITCH, 
SWITCH, 
BYTE, 

SWITCH, 
SWITCH, 


SWITCH, 
SWITCH, 
SWITCH, 
SWITCH, 


SWITCH, 
SWITCH, 


SWITCH, 
SWITCH, 


oe Bliss-32 V4.0-742 
FDL. SRCIJFOLGENTAB.B32; 1 


WHICH BTYPE OFF 
CONNECT,RAB, -V_ASY ), 
CONNECT,RAB,  V=BIO ). 
ONNECT,RAB, L-BKT ), 
CONNECT,RAB, LCTX ). 
CONNECT.RAB,  V7EOF ). 
CONNECT.RAB,  V7LOA ). 
CONNECT,RAB,  VIFDL ), 
CONNECT,RAB,  B_LKRF ), 
CONNECT,RAB, § V_KGE ), 
CONNECT,RAB,  V_KGT ), 
CONNECT.RAB.  V7LIM ). 
CONNECT,RAB,  VILOC ), 
CONNECT;RAB,  VTREA ), 
CONNECT;RAB, § VIRLK ), 
CONNECT,RAB,  V_ULK ), 
CONNECT,RAB,  B_MBC ), 
CONNECT,RAB,  B_MBF ), 
CONNECT.RAB, § VINLK ). 
CONNECT,RAB,  V_NXR ), 
CONNECT,RAB, V_RAH ), 
CONNECT,RAB, V_RRL ), 
CONNECT,RAB,  V_TMO ), 
CONNECT,RAB,  B_TMO ), 
CONNECT,RAB, V_TPT ), 
CONNECT,RAB,  V_CCO), 
CONNECT,RAB,  V_CYT ), 
CONNECT,RAB, § V~PMT ), 
CONNECT,RAB, V_PTA ), 
CONNECT,RAB, § V_RNE ), 
CONNECT,RAB,  V_RNF ), 
CONNECT;RAB, VIUIF ), 
CONNECT,RAB,  V_WAT ), 
CONNECT;RAB,  V~WBH ), 
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arash | - Hats Peet eeT Year seedeeecenTae 93547 . (a8 vO 
s 227 942 1 14 
5 g 43 | DATE PRIMARY 
; 9 48 ! SEC FAO FULL DTYPE WHICH BTYPE  BOFF 
: $34 ot i 
: 949 1 GENTAB( BACKUP, '!_!24<BACKUP!>!AS' _CLEAR, SPECIAL,DATE, XAB,  L_BDTO), 
> 235 950 1 GENTAB( CREAT, ‘!-iO4<CREATIONi>!AS', “CLEAR, SPECIAL.DATE. XAB,  L~CDTO). 
: 236 0951 1 GENTAB( EXPR, ‘!"!O4<EXPIRATION!>!AS',"CLEAR, SPECIAL.DATE. XAB,  L7EDTO). 
: 237 0952 1 GENTAB(C REV, ‘!"!2G<REVISION!>!AS', “CLEAR, SPECIAL.DATE. XAB,  L-RDTO). 
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> 239 0953 1 !4 
: 260 954 1 | FILE PRIMARY 
> 261 955 1: 
: 26 296 1i SEC FAO FULL DTYPE WHICH TYPE  BOFF 
$ 4 95 1! 
: 264 958 1 i- 
: 265 959 1 
> 266 0960 1 GENTAB( ALL, "! 1 24<ALLOCATION!>!UL", CLEAR, LONG, FILE, FAB,  L_ALQ ), 
s 267 P 0961 1 GENTAB( BIC, "ii 2G<BEST_TR RY_ CONTIGUOUS! >tac! 
: 268 0962 1 _CLEAR, SWITCH, FILE, FAB, V_CBT ), 
> 249 0963 1 GENTAB( BKTSIZ, '!_!24<BUCKET SIZE!>!UB'; CLEAR,BYTE, FILE. FAB.  ®7BKS ). 
; 230 0964 1 GENTAB( FCTX, “iQQ<CONTEXT!>'UL', “SET, FILE, FAB,  LZCTX ), 
: 251 0965 1 GENTAB( CONT. vit i 4<CONTIGUOUS:>:AC* CLEAR, SWITCH, FILE. FAB,  V7CTG ). 
; 3¢ 0966 1 GENTAB( CIF, "ii DG<CREATE IFE>IAC', "SET, | SWITCH, FILE, FAB,  VICIF ), 
: 25 P 0967 1 GENTAB( DFNAM, ‘i7! GeDEEAULT _NAME!>! AST, 
: 254 0968 1 CLEAR, STRING, FILE, FAB, L_DNA ), 
> 255 P 0969 1 GENTAB( DEFWRT, 11 126¢DEFERRED_WRITE!>!RE" 
: 256 0970 1 CLEAR, SWITCH, FILE, FAB, V_DFW ), 
> 257 P 0971 1 GENTAB( DOC, "!_!24<DELETE_ON_CLOSE!>TAC', 
: 258 0972 1 SET, SWITCH, FILE, FAB, V_DLT ), 
> 259 P 0973 1 GENTAB( DIR, "1! 24<DIRECTORY_ENTRY!>TAC’, 
: 260 0974 1 SET, SWITCH, FILE, FAB, V_TMP ), 
> 261 0975 1 !GENTAB( EODEL, '!_!24<ERASE_ON_DELETE'>TAC', 
; 6¢ 0976 1 ~CLEAR, SWITCH, FILE, FAB, V_EDL ), 
> 26 0977 1 GENTAB( EXTEN, '!_!24<EXTENSION!>!UW’, “CLEAR. WORD, FILE. FAB,  W7DEQ ). 
> 266 0978 1 GENTAB( GBC, *i-124<GLOBAL_BUFFER_COURT Tr UW 
> 265 0979 1 , WORD, FILE, FAB,  W_GBC ), 
> 266 0980 1 GENTAB( MTBLSIZ,'!_!24<MT_BLOCK_SIZE!>!uQ', 
: 267 0981 1 CLEAR, WORD, FILE, FAB,  W_BLS ), 
> 268 0982 1 GENTAB( MTCP, '!_!24<MT_CURRENT_POSITION'>!AC', 
: 269 0983 1 ET, SWITCH, FILE, FAB,  V_POS ), 
> 270 0984 1 GENTAB( MINEF, '!_!24<MT_NOT EOF!>!AC',"SET, SWITCH, FILE, FAB, | VINEF ), 
3: e71 P 0985 1 GENTAB( MTPRO, '!~!24<MT~PROTECTION!>! UB", 
: 272 0986 1 CLEAR, BYTE, FILE, XAB,  B_MTACC ), 
> 273 P 0987 1 GENTAB( MTREW, ‘!_!24<MT_OPEN_REWIND!>!AC', 
: 27% 0988 1 SET, SWITCH, FILE, FAB, V_RWO), 
> 275 P 0989 1 GENTAB( MTRWC, '!_!24<MT_CLOSE_REWIND!>TAC', 
: 276 0990 1 SET, SWITCH, FILE, FAB, V_RWC ), 
: 277 P 0991 1 GENTAB( MAXRECN,'!_!24<MAX_RECORD_NUMBERT>!UL', 
: 278 0992 1 CLEAR, LONG, FILE, FAB,  L_MRN), 
: 279 P 0993 1 GENTAB( MAXVER, '!_!24<MAXIMIZE _VERSION!STAC’. 
: 280 0994 1 CLEAR, SWITCH, FILE, FAB, V_MXV), 
; 281 0995 1 GENTAB( NAME, ‘!_!24<NAME!>!AS CLEAR, STRING, FILE, FAB, L-FNA ), 
; 38¢ P 0996 1 GENTAB( NFS, ii 24<NON_FILE “structuneD!> ae" 
: 28 997 1 SWITCH, FILE, FAB, V_NFS ), 
; 384 0998 1 GENTAB( ORG, 1 124<ORGANIZATION!>!ACT ™ 
: 285 0999 1 €LEAR, QUALIFIER,FILE, FAB,  B_ORG ), 
: 286 P 1000 1 GENTAB( OFP, *!_'24<OUTPUT_FILE _PARSET>! AC* 
: 287 1001 1 “SET, ° SWITCH, FILE, FAB, V_OFP ), 
> 288 1008 1 GENTAB( OWNER, '! = {Be<Duen 2 :3y “CLEAR, LONG, FILE, XAB,  LZUIC ), 
> 289 P 1003 1 GENTAB( POC, "ii 24<PRINT_ON_CLOSE!>!A€C* 
: 290 1004 1 “set, SWITCH, FILE, FAB, V-_SPL ), 
> 291 1005 1 GENTAB( PRO 
3 $36 P 100 1 *} OT 54 <PROTECTION!> (system: 'AS, oer 'AS pre :'AS, world:!AS)°, 
: 29 1007 1 _CLEAR, SPE TALS FILE, XAB,  W.PRO), 
> 294 1008 1 GENTAB( READC, '! ~ {34<READ CHECK!>!AC’, “CLEAR. aur CH, FILE. FAB.  VIRCK ). 
: 295 1009 1 GENTAB( REVISN, *'7!24<REVISION'>‘Uw', ““CLEAR. WORD, ' FILE. XAB.  WTRVN). 
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104 600 1e-Sep-19 4 eter: PDL LSREIFDLGENTAB 63245 9 9) vO 
: % P 1010 1 GENTAB( Sao, "!_!2G<SEQUENTIAL_ONLY!>!AC', 

: 29 1011 1 SET, SWITCH, FILE, FAB,  V_SQ0), 

: 298 P 1018 1 GENTAB( SOC, "!_!24<SUBMIT_ON_CLOSE!>TAC'. 

: 299 1013 1 _SET, SWITCH, FILE, FAB,  V_SCF ), 

; 300 1014 1 GENTAB( SUPER, '!_!24<SUPERSEDE!>!AC', “CLEAR, SWITCH, FILE. FAB, | V7SUP ); 

: 301 1015 1 GENTAB( TEMPO, ‘ii Q4<TEMPORARY!>/AC'. “SET, ° SWITCH, FILE. FAB. | V7TMD ). 

: O¢ P 1016 1 GENTAB( TOC, "i" 1 04<TRUNCATE_ON_CLOSET> IAC’, 

: 30 1017 1 SET, SWITCH, FILE, FAB,  V_TEF ), 

: 304 P 1018 1 GENTAB( UFO, "1! 2G<USER_FILE_OPEN!>!KC* 

: 305 1019 1 _SEf, SWITCH, FILE, FAB, V_UFO), 

: 306 1020 1 GENTAB( WIN 1 1={Shswinvow SIZE!>!SB'T_SET,BYTE FILE, FAB,  BIRTV ). 

: 30 1021 1 GENTAB( WRITEC, "!~i2a<WRITE_CHECK(>‘AC'. "CLEAR, SWITCH, FILE. FAB, | V7WCK ). 
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0 - FDL. SRCJFDLGENTAB. B32; a) vO: 
; $ 1038 1 '4 
; 1039 1 | KEY PRIMARY 
3 8 1040 1! 
: 329 1041 1: SEC FAO FULL DTYPE WHICH TYPE  BOFF 
3 0 1006 oe 
: 1 1045 1 t= 
3 ¢ 1044 1 
: 1045 1 GENTAB( CHANGE, '!_!24<CHANGES!>!AC', CLEAR, SWITCH, KEY,  XAB, —V_CHG ), 
; 334 1046 1 GENTAB( DAREA, i 04<DATA_AREA‘>'UB*, “CLEAR. BYTE, Y, AB,  BIDAN ), 
; 5 1047 1 GENTAB( DFILL, vit \OG<DATA-FILLi>iUW', “CLEAR, WORD, KEY,  XAB,  WTDFL ). 
: 336 1048 1 GENTAB( DATKC, '!"i24<DATATKEY_COMPRESSTON!>!AC', 
: 337 1049 1 CLEAR, SWITCH, KEY, | XAB,V_KEY_NCMPR ), 
; 338 1050 1 GENTAB( DATRC, '!_!24<DATA_RECORD_COMPRESSION!>!AC' 
; 339 1051 1 _CLEAR, SWITCH, KEY,  XAB,V_ Dar -NCHPR ), 
; 340 105 1 GENTAB( DUPS,  '!_!24<DUPLICATES!>!AC', "CLEAR, SWITCH, KEY,  XAB, DUP . 
> 341 1053 1 GENTAB( IAREA, ‘'!"i24<INDEX_AREA’>‘UB'.-CLEAR, BYTE, KEY.  XAB, 8° IAN 
: 342 P1054 1 GENTAB( IDXC, '!7!24<INDEXTCOMPRESSIONT> AC’, 
: 343 1055 1 “CLEAR, SWITCH, KEY, | XAB,V_IDX_NCMPR ), 
> 344 1056 1 GENTAB( IFILL, '! ~ {BeS}NDEN FILL!>!UW'. “CLEAR, WORD, KEY, XAB, ~ WIIFL ), 
: 345 P 1057 1 GENTAB( LAREA, '!~!24<LEVELT_INDEX_AREAT>!UB', 
: 346 1058 1 _CLEAR, BYTE, KEY,  XAB,  ®B_LAN), 
; 347 1059 1 GENTAB( KYNAME, '! =| BG<NAME!>1AS* “CLEAR, STRING, KEY, | XAB, | _LZKNM ). 
: 348 1060 1 GENTAB( NULL,  ‘'!"!O4<NULL_KEY!>!AC', “CLEAR, SWITCH, KEY, | XAB, | VTNUL ), 
> 349 "061 1 GENTAB( NULLVAL,*! 7! 24<NULL~ VALUE !>!UB' ,— CLEAR, BYTE, KEY,  XAB. NUL ), 
: 350 1068 1 GENTAB( PROL, '!~'24<PROLOG!>!uB' “CLEAR, BYTE. KEY.  XAB, B_PROLOG )- 
> 351 1063 1 GENTAB( SEGLEN, °!~'24<SEGn LENGTH: 5 1UB*- | CLEAR,BYTE, KEY. XAB, ~ B.S1Z0 5, 
: 352 P 1064 1 GENTAB( SEGPOS, *!~!24<SEGn~POSITION!> 
: 353 1065 1 WC LEAR, WORD, KEY, XAB, W_POSO ), 
: 354 1066 1 !Different types per re are not supported ye if ever 
: 355 1067 1 'GENTAB(SEGT "t124<5EGn TYPE !>1AC*, _CLEAR, SUALIF IER,KEY, XAB, 8 _TYPO ), 
: 356 1068 1 GENTAB( SEGTYP, *!~i24<TYPET>!AC! “CLEAR, QUALIFIER,KEY, XAB, B-DIP ), 
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396318 AX-11 Bliss-32 V4.0- 308% Page 13 
14-Sep-1984 12:31:18 FDL. SRCIFDLGENTAB.B32; (12) 
; 358 1969 1! 

: 359 1070 1 | RECORD PRIMARY 

: 360 i071 13 

: 361 107 13 SEC FAO FULL OTYPE WHICH TYPE  BOFF 

: 362 1073 1: 

: 36 1074 1 i- 

: 364 1075 1 

: 365 1076 1 GENTAB( BLKSPN, '!_!24<BLOCK_SPAN!>!AC', CLEAR, SWITCH, RECORD, FAB, V_BLK ), 

> 366 P 1077 1 GENTAB( CARCTRL,'!~!24<CARRIAGE_CONTROL! iSiA 

; 367 1078 1 cLE aR, QUALIFIER,RECORD,FAB, V_CR), 

: 368 P 1079 1 GENTAB( VFCSIZ, *!_!24<CONTROL_FIELD_SIZE!>!uU 

: 369 1080 1 LE ie BYT RECORD, FAB B_FSZ ), 

: 370 1081 1 GENTAB( FMT "1 '2G<FORMATID!AC', “CLEAR. BUATIFIER RECORD FAB, BIRFM ). 

: 371 1082 1 GENTAB( SIZE, ‘i7i2a<SIZE!>iuw', “CLEAR, WORD, RECORD, FAB,  WIMRS ). 
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1098 1 !+ 
1099 1 ! SYSTEM PRIMARY 
1100 1! 
1101 1! SEC FAO 
1198 1! 
1105 1 !- 
1104 1 
1105 (1 
1106 1 
1107 1); 
1108 1 
1109 0 END ELUDOM 
53 53 45 43 43 41 06 
42 55 21 20 41 45 52 41 08 
5443 45 GE 4E 4F 43 07 
45 54 41 44 04 
45 4€ 49 46 04 
28 22 SF 21 54 4E 45 44 49 sp 
46 20 53 4D 56 2F 58 41 56 20 20 
52 20 45 54 41 52 45 4E 45 
22 65 of 69 74 75 
4C 41 4€ 52 55 4F 4A 0? 
42 55 21 20 59 45 4B 07 
44 52 4F 43 45 52 06 
47 4€ 49 52 41 48 53 O07 
4D 45 54 53 59 53 06 
43 4F 4C 42 3C 34 i 21 «SF 4 13 
43 41 4 , me; 
45 4C 45 44 3C 34 32 21 SF 21 11 
43 41 et 
45 47 34 38 7. 5} E 
21 54 55 50 3C 34 $1 + ae 4 
ah 34 32 21 SF 21 14 
43 41 21 3€ 21 4F 
4E 55 52 54 3C 34 36 4) oF @1 33 
43 41 ¢} S @ 
41 44 50 55 3C 34 32 21 25 c 5 
4F 4C 4C 41 3C 34 32 4 7 2. iS 
4C 55 ¢} E ¢} SE 4F 
54 53 45 42 3C 34 32 21 SF 21 IE 
53 55 4F 55 47 49 54 4E GF 43 2s 
48 43 55 4 C 34 32 1 SE $} 18 
4 5 21 5 1 45 SA 4 
54 4E 4F 4 ¢ 4 ; @ a 3 
43 41 21 5E ¢} ze 
41 58 45 3C 34 32 21 SF 21 if 
3E 4 4 éf 49 4E 4F 49 e+ 49 5 
4 58 3¢ 54 «32 «21 «SF O21 «(14 
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WHICH BTYPE BO0FF 


GENTAB( SOURCE, '!_!24<SOURCE!>VAX/VMS',_ CLEAR, SPECIAL,SYSTEM, FAB, V_DEL ) 


44 odd VAX=11 FDL Utilities 
\V04-000\ 


-FOLSPLIT,NOWRT,NOEXE, SHR, PIC,2 
<6>\ACCESS\ 

<8>\AREA !UB\ 

<7>\CONNECT\ 

<4>\DATE\ 

<4>\FILE\ 

\-IDENT! ""!+!AS VAX/VMS FDLSGENERATE Ro\ 


\utine’'\ 
<7>\ JOURNAL \ 


<6>\SYSTEM\ 
<19>\!_!24<BLOCK_I0!>!AC\ 


<17>\!_!24<DELETE!>!AC\ 
<14>\!_!24<GET!>!AC\ 

<14>\ 171 24<PUT!>!AC\ 
<20>\!_!24<RECORD_10!>!AC\ 
<19>\!_!24<TRUNCATE!>!AC\ 
<17>\!_!24<UPDATE!>!AC\ 
<21>\!_!26<ALLOCATION! >!UL\ 


<30>\!_!24<BEST_TRY_CONTIGUOUS!>!AC\ 


<22>\!_!24<BUCYKET_SIZE!>!UB\ 
<21>\!_!24<CONTIGUOUS!>!AC\ 
<28>\!_!24<EXACT_POSITIONING!>!AC\ 
<20>\!_!24<EXTENSION! >! UW\ 
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F i VAX=11 FDL Utilities Jo~se0-1 38% OF ger )s AX-11 Ol igse te V4.0-742 
v04-000 14-Sep-1984 12:31:18 FDL. SRCJFDLGENTAB.B32; 1 
Tr pao & § 01 
4E 4F 49 54 49 oo GF 50 3C 3 : 3 : : is O16 P.AAY: ASCII <19>\!_!16<POSITION!>!AS\ 
3€ 21 45 40 55 4C 4F 56 3C 34 2 21 F i if o180 P.AAZ: .ASCII <17>\!_!24<VOLUME!>!UW\ 
4F 52 48 43 GE 59 23 4} A ie 3¢ 3 : ct ir ae P.ABA: .ASCII <23>\!_!24<ASYNCHRONOUS!>!AC\ 
4F 49 SF 4B 43 GF 4C 42 SC 34 8 ¢! : se is a1? P.ABB: .ASCII <19>\!_!24<BLOCK_IO!>!AC\ 
43 SF 54 45 4B 43 55 Pf 6 3 3 3 sf fi ig oie P.ABC: .ASCII <22>\!_!24<BUCKET_CODE!>!UL\ 
21 54 58 45 54 GE GF 43 3C 8 5 4 35 A \ gare P.ABD: .ASCII <18>\!_!24<CONTEXT!>!UL\ 
46 SF 46 GF SF 44 4E $3 if 3 ! 2 4 i8 88 Fi P.ABE: .ASCII <22>\!_!24<END_OF _FILE!>!AC\ 
43 55 42 SF 4C 4C 3 re 3 s ; } af é ph 38 Hs P.ABF: .ASCII <23>\!_!24<FILL_BUCKETS!>!AC\ 
4C 45 46 SF 54 53 41 ¢8 st se : : 7 } 1g 4 gi P.ABG: .ASCII <22>\!_!24<FAST_DELETE!>!AC\ 
52 5F 46 4F SF 59 45 4B 3C rH ¢ 1 SF 21 18 8 4B P.ABH: .ASCII <27>\!_!24<KEY_OF REFERENCE !>!UB\ 
42 55 21 3& 21 45 43 4E 4 2 45 46 4 O25A 
41 45 52 47 SF 59 45 4B 3C 34 i 4 5F 21 1C 00 $7 P.ABI: .ASCII <28>\!_!24<KEY_GREATER_EQUAL!>!AC\ 
43 41 21 3E 21 4C 41 55 51 & F 52 45 54 00276 
41 45 52 47 SF 59 45 4B 3C 34 32 21 5SF 21 18 00284 P.ABJ: .ASCII <27>\!_!24<KEY_GREATER_THAN!>!AC\ 
43 41 21 3E 21 4E 41 48 54 SF 52 45 54 00293 
49 4D 49 4C SF 59 45 4B 3C if if 3 Hi 3 i 3 7 P.ABK: .ASCII <20>\!_!24<KEY_LIMIT!>!AC\ 
4D SF 45 54 41 43 4F rt if 3 32 : 4 fi i? 00385 P.ABL: .ASCII <22>\!_!24<LOCATE_MODE!>!AC\ 
SF 4E 4F SF 4B 43 rh af 3 i. 3 31 44 el Uy G09¢¢ P.ABM: .ASCII <23>\!_!24<LOCK_ON_READ!>!AC\ 
SF 4E 4F SF 4B $3 rf sf fs 3 83 ¢} io ¢} 18 Bose P.ABN: .ASCII <24>\!_!24<LOCK_ON_WRITE!>!AC\ 
55 5F 4C 41 55 4€ $] 4D 3C $4 32 21 SF 21 18 0030 P.ABO: .ASCII <27>\!_!24<MANUAL_UNLOCKING!>!AC\ 
43 41 21 3E g 47 4E 49 48 43 4F 4C 4E 0030C 
4F 4C 42 49 54 4€ 55 40 3C 34 32 21 SF 21 8 toh P.ABP: .ASCII <27>\!_!24<MULTIBLOCK_COUNT!>!UB\ 
es 55 21 3€ 21 54 4€E 2? 4F 43 SF 4B 43 00 ¢8 
46 55 42 49 54 4€C 55 40 3¢ 34 i ¢} SF 21 = «(1C Ops 5 P.ABQ: .ASCII <28>\!_!24<MULTIBUFFER_COUNT!>!UB\ 
42 55 21 3€ 21 54 4E 55 4F 4 F 52 45 46 00344 
SE 21 4B 43 4F 4C GF 4E 3C 34 32 21 2 ¢! i 8 if P.ABR: .ASCII <17>\!_!24<NOLOCK!>!AC\ 
54 53 49 58 45 GE 4F 4E 3C 34 ; ¢} af 21 3 0364 P.ABS: .ASCII <29>\!_!24<NONEXISTENT_RECORD!>!AC\ 
435 41 21 3E 21 44 $2 4F 43 45 F 54 4€ 4 0373 
45 48 41 SF 44 41 45 52 i$ i; i 4 ¢} if 8 o¢ P.ABT: .ASCII <21>\!_!24<READ_AHEAD!>!AC\ 
47 45 52 SF 44 41 45 52 f 4 ¢ 1 g 4 1A 88 , P.ABU: .ASCII <26>\!_!24<READ_REGARDLESS!>!AC\ 
43 41 21 3E 21 3 45 4€ 44 52 41 OO3A 
SF 54 55 4F 45 40 49 54 3C 34 32 21 SF 21 19 00 BS P.ABV: . ASCII <25>\!_!24<TIMEQUT_ENABLE!>!AC\ 
43 41 21 3E ¢! 45 35 42 41 GE 45 3 C 
SF 54 55 4F 45 4D 49 54 3C 34 32 21 SF 21 19 CD P.ABW: .ASCII <25>\!_!24<TIMEOUT_PERIOD!>!UB\ 
42 55 21 i 1 44 4F 49 $0 45 50 8 b¢ 
45 54 41 $3 re 3 ¢ ; f : 36 ¢} it ct Hy ; P.ABX: ASCII <26>\!_!24<TRUNCATE_ON_PUT!>!AC\ 
3 $3 $e $1 ty if i? st § ? if ¢ i $} it a202 P.ABY: .ASCII <30>\!_!24<TT_CANCEL_CONTROL_O!>!AC\ 
) 
4 0420 
53 41 43 50 55 SF 54 54 3C 34 32 21 SF 21 =A 0231 P.ABZ: .ASCII] <26>\!_!24<TT_UPCASE_INPUT!>!AC\ 
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Pee Se Se Se Se Se Se Se Be Se Se Se Se Se Se Se Se Be Se Se Se Be Be Be Se Se Se Se Se Se Fe Se Se Fe Fe Fs Be Se Be Be Be Se Se Be Be Be Be Be Be Be Fe Be Be Se Be Se 


1 gh aaah atoning EREESUE USA Whaat: 
50 4D 4F $3 30 g af gi ¢ 3 P.ACA: .ASCII <20>\!_!24<TT_PROMPT!>!AC\ 
43 " 4 
$3 3% 32 33 i? if ?¢ 23 if Me P.ACB: .ASCII <30>\!_!24<TT_PURGE_TYPE_AHEAD!>!AC\ 
SF 44 41 «45 2§ if 3 3 i it P.ACC: .ASCII <25>\!_!24<TT_READ_NOECHO! >! AC\ 
SF 44 t} $3 3¢ 3f 31 33 is 54 P.ACD: .ASCII <27>\!_!24<TT_READ_NOFILTER!>!AC\ 
49 SF 45 54 41 44 50 55 3C i3 P.ACE: .ASCII <20>\!_!24<UPDATE_IF!>!AC\ 
sav ii Beé ¢ ; ec | F-aenae 
53 2} , #e ° i % col mn !>!AC\ 
3 21 50 55 4B 43 41 42 8 4 P.ACH: .ASCII <17>\!_!24<BACKUP!>!AS\ 
4E 4F 49 54 41 45 52 43 3C 34 P.ACI: .ASCII <19>\!_!24<CREATION!>!AS\ 
49 54 41 52 49 50 58 45 i; P.ACJ: .ASCII <21>\!_!24<EXPIRATION!>!AS\ 
4E 4F 49 53 49 56 45 52 34 P.ACK: .ASCII <19>\!_!24<REVISION!>!AS\ 
49 54 41 43 GF 4C 4C 41 He P.ACL: .ASCII <21>\!_!24<ALLOCATION!>!UL\ 
34 P.ACM: .ASCII <30>\!_!24<BEST_TRY_CONTIGUOUS!>!AC\ 


59 52 54 SF 54 53 45 $¢ 
41 21 3€ 21 53 55 4F 5 


53 5F 54 45 4B 43 55 8 
21 54 58 45 54 GE 4F 23 
4F 55 47 49 54 GE 4F 43 
49 SF 45 54 41 45 52 43 


.ACN: .ASCII <22>\!_!24<BUCKET_SIZE!>!UB\ 
sACO: ASCII = <18>\!_!24<CONTEXT!>!UL\ 
.ACP: ASCII <21>\!_!24<CONTIGUOUS!>!AC\ 
sACQ: ASCII <20>\!_!24<CREATE_IF!>!AC\ 
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=F FRU PROMI SRM SRP FS PPO PD EPS PUWI PUP RS FO MPN — FIONN UTO—=TV0O 

PROVRS  SNNMIMIL MLN LNMLSANNWNLSANN FS UWMLWNMLN MLMLNMMMNMLMWwLN WWTP sL 
—F RRO PVM BNA MAAN VM WH WH HS HS HS HN FM MAMMA MT OMAM NO 
Bi nt Bi Ba Bt Bh BB a St BN SA) St BS BS PS FS POO 
MUAIATOM HOO NUIT OPM S MOM NA SIM NY DOW FM NWN Ss SOON PAL MOM OW MME LN 
COOOCSCOCOOCOOCOOCOOOSOOOO OOOO OOCOC OOO OOO OO OOOO OOOO OOOO OOO OOOO OOOO OOOO 
PARP BPPEDPPPPA PAP PAD PPP PVPS SSSI EB BP PPP PPP PPLE EE 


POR FROYVHPO _— PPPINVPOYVPOYPY SNNNVPMNINYVDP EMM LMA LVM LN LMVPNIMILMLNM VWoPTnw 


rw FW OPO APP OC EOC sO 

= 

~o 
ROS PAWL VWNNYVINYIW FE WNUWIIWEWPW WWI MANIA APNE WEWEWEW PW 
DPR PVT BB HS API TL PUPP PI PI UT BS UP UIA EPO UT 
o— I No 0 ee ne, ed Oe eee a iam er SM rn OO OS SS TH OS , ee ns) 
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5F 54 4C 55 41 46 $3 rf 34 eACR: ASCII =<23>\!_!24<DEFAULT_NAME!>!AS\ 

44 45 52 52 $3 ret 33 re 5 eASCII] <25>\!_!24<DEFERRED_WRITE!>!AC\ 

4F SF 45 rf} ri 3 $2 34 Me eACT: ASCII = <26>\!_!24<DELETE_ON_CLOSE!>!AC\ 

52 4F 54 $3 $3 3 ? 34 3 eACU: ASCII = <26>\!_!24<DIRECTORY_ENTRY!>!AC\ 

4F 49 53 4E 45 54 58 45 He eACV: ASCII = <20>\!_!24<EXTENSION! >! UW\ 

$g 3 3 $i $2 a éf rH § 34 eACW: ASCII <30>\!_!24<GLOBAL_BUFFER_COUNT!>!UW\ 
4B 43 4F 4C 42 25 3 3 : PACK: .ASCIT <24>\!_!24<MT_BLOCK_SIZE!>!UW\ 

45 52 52 55 43 5F 54 40 3C 34 P.ACY: ASCII <30>\!_!24<MT_CURRENT_POSITION!>!AC\ 
41 21 3€ 21 4E 4F 49 54 49 53 

45 SF 54 4F 4E SF 54 4D ¢ it } ‘ P.ACZ: ASCII <21>\!_!246<MT_NOT_EOF!>!AC\ 
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FRLGENTAB—VAN~T1 FDL utilities 1E-se0-1984 O1:uh:14  yAK~11 BL iss-52 4.027% 
; 21 «SF , 4 one P.ADA: .ASCII <24>\!_!24<MT_PROTECTION!>!UB\ 
as a eetae ie 5 2 jl i 34 rH st ‘3 deci P.ADB: .ASCII <25>\!_!24<MT_OPEN_REWIND!>!AC\ 
ese KNEE ALE & AE HH ftv: sec aoviinen-aenmmeepue 
8 gs 4 i : 2 be i : ; ef i $500 P.ADD: ASCII <28>\!_!24<MAX_RECORD_NUMBER!>!UL\ 
= é 53 i i. 52 ‘3 f i i 34 ef 34 3 yet P.ADE: .ASCII <27>\!_!24<MAXIMIZE_VERSION!>!AC\ 
ot 43 ‘i 2 : 2 dE i ‘5 35 Se rH 6 at 15 P.ADF: .ASCII <15>\!_!24<NAME!>!AS\ 
oils eae S ‘ a : 1 ie sre nya ASCII <30>\!_!24<NON_FILE_STRUCTURED!>!AC\ 

rae .ADG: . ie 

. ‘ . € . 3 2 . me . ‘ 2 e ‘3 a0767 P.ADH: .ASCII <23>\!_!24<ORGANIZATION!>!AC\ 
ne pa is ‘i A Al ct i i i tag nynen, ASCII <28>\!_!24<OUTPUT_FILE_PARSE!>!AC\ 
mRHH EASE RT OG SG Be es cee couinawensean 
ea « . sl PO age 33 $3 pera P.ADK: .ASCII <25>\!_!24<PRINT_ON_CLOSE!>!AC\ 
aaa : si 24 3. A is 33 i i ‘3 3 iba aaa ASCII \2!_!24<PROTECTION!>(system:!AS, owner: !A\ 
of gs 45 5h ar $2 3b Se ee Bl SF BT St Bored r. : 
sora seal si 4 i ee 9S Oe St se 36 SOrES «ASCII \S, group:!AS, world:!AS)\ 
oF ato 29 53 di 5 3A é4 é¢ re ef pone P.ADM: .ASCII <21>\!_!24<READ_CHECK!>!AC\ 
Sin aaivata ek i 5 A 5 i is 13 Soste iain ASCII <19>\!_!24<REVISION! >! UW\ 
eee HBOS OB & EB w Ett nen wit esstinamnts cient 
ae 43 43 zi 21 i5 33 iF it rH 5 TE poses P.ADQ: .ASCII <20>\!_!24<SUPERSEDE!>!AC\ 
ue chr pi pu et é3 4 3 $1 F i te sae ASCII <20>\!_!24<TEMPORARY !>!AC\ 
ate a a ee as ‘3 ‘i A i A 39 tt Cyne pK <28>\!_!24<TRUNCATE_ON_CLOSE!>!AC\ 
7 é3 ‘ 21 3 21 i 33 if ic is i 35 5 Bosae agate, ASCII <25>\!_!24<USER_FILE_OPEN!>!AC\ 
pad as coat i 21 3 A dE i $0 of 3f $2 itt: P.ADU eASCIT <22>\!_!24<WINDOW_SIZE!>!SB\ 
ge af bee Yar ‘2 33 4 i é5 SA 12 itt P.ADV: .ASCII <22>\!_!24<WRITE_CHECK!>!AC\ 
eed eases és ‘i zi x ip ‘3 FA Mitta “yom eASCII <22>\!_!24<AF TER_IMAGE!>!AC\ 
pet I PI és ‘i 4 5 | i tr 15 $90 ayem ASCII <21>\!_!24<AFTER_NAME !>!AS\ 
A a a 33 ‘i $3 A ‘3 i a atin: naa <22>\!_!24<AUDIT_TRAIL!>!AC\ 
ee ee ae ‘3 41 A i | oe ‘9 13 0983 aad ASCII <21>\!_!24<AUDIT_NAME!>!AS\ 
ata aaa ae 33 ‘3 $3 : 3 ‘3 13 ir ; : ASCII <23>\! '24<BEFORE_IMAGE!>!AC\ 
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43 41 «21 . 2 S&S 5 C 4 1 if A tt P.AFD: .ASCII <14>\!'_!'26<PUT!I>!AC\ : 
‘3 21 45 56 41 46 3 28 H 4 3 $i 3F é1 i BEE P.AFE: <ASCII <17>\i7! 34<UPDATE!>!AC\ : 
54 4E 469 SF 52 45 53 5 3¢ 34 32 21 SF 21 5 COO P.AFF: ASCII <25>\!_!24<USER_INTERLOCK!>!AC\ : 
$3 $4 ff gy G+ SP 33 3h of 3g fe COF 3 
'3—e 21 45 43 § 55 GF f 3% «3 $} SF » 7 OCIA P.AFG: .ASCII <21>\!_!24<SOURCE ! >VAX/VMS\ 3 
40 56 OF 58 41 56 00629 : 
.PSECT _FDLSGLOBAL,NOEXE, PIC,2 
00# 00000 FDLSAB_PRI_TABLE:: 
.BYTE  OC8 ; 
00000000' 00008 “ADDRESS P.AAA : 
00" 000¢ “BYTE 0[28) ; 
00000000' 000 [ADDRESS P.AAB ; 
B¢ 0002C YTE : 
0 00020 BYTE : 
0017 O00¢E “WORD 23 F 
00000000" 00030 “ADDRESS P.AAC : 
00# 00054 *BYT : 
00000000' 00038 “ADDRESS P.AAD : 
00# 0003C¢ “BYTE : 
00000000' 00040 “ADDRESS P.AAE ; 
00# 00044 “BYTE O04] : 
00000009" 00048 “ADDRESS P.AAF : 
01 0004¢ "BYTE. 1 : 
00# 00040 "BYTE (3) ; 
00000000' 00050 “ADDRESS P.AAG : 
00# 00054 “BYTE : 
00000000' 00058 “ADDRESS P.AAH : 
02 0005¢ ‘BYTE 2 : 
00 0005D “BYTE : 
0017 0005E “WORD 23 : 
00000000" 00060 “ADDRESS P.AAI ; 
00# 00064 "BYTE O04) : 
00000000" 00068 “ADDRESS P.AAJ : 
00# 0006C "BYTE OC4) : 
00000000' 00070 “ADDRESS P.AAK : 
00074 L 2 
00# 00080 FDLSAB_SEC TABLE: 
“BYTE OC12) : 
00000000" 0008¢ “ADDRESS P.AAL : 
00 01 06 01 90096 , : 
005 0016 00094 [WORD 28, 
00000000' 00098 “ADDRESS P.AAM : 
00 01 06 01 0009C "BYTE. 1, 6, 1, 0 : 
0002 0016 O00A0 “WORD 20, 2 : 
00000000' O00A4 “ADDRESS P.AAN : 
00 01 06 01 O00A8 ef. os: ee : 
0001 0016 OOA “WORD 20, : 
00000000" 0008 “ADDRESS P.AAO ; 
00 01 06 01 000B4 "BYTE. 1, 6, 1, 0 : 
000 0016 0088 “WORD 22, ; 
0090 000" 000BC “ADDRESS P.AAP : 
00 01 06 01 900 eve. 4, Se Ue : 
006 0016 0004 “WORD 20, 6 : 
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Kk 3 
FDLGENTAB VAX=11 FDL Utilities 16=Sep-1984 01:44:14 AX=11 Bliss-32 V4.0-74 
On 600 12-88-1382 9} 1:18 FDL. SRCJFDLGENTAB.B32; 
00 3 718 ORD 54, 0 
00900000" Ore “ADDRESS P.AEZ 
00 OD 06 01 007 YTE 1, 6, 13, 0 
092 9017 0724 ORD 2%, 2 
0 00 000° 00728 ADDRESS P.AFA 
00 OD 06 01 O072C YTE 1, 6, 13, 0 
0001 0017 00730 ORD 28, { 
00000000" 00734 “ADDRESS P.AFB 
00 OD 06 01 00738 "BYTE. 1, 6, 13, 0 
0004 0017 007%¢c [wORD 28, & 
00900090" 0740 [ADDRESS P.AFC 
00 op 06 01 0744 “BYTE 1, 6, 13, 0 
005 0017 748 “wORD 28, § 
00000000' 0746 ADDRESS P.AFD 
00 Op 06 0% 0075 YTE 1, 6, 13, 0 
0000 0017 00754 WORD 28, 6 
00000000" 00758 ADDRESS P.AFE 
00 OD 06 01 0075¢ BYTE 1, 6, 13, 0 
0003 0017 00760 *woRD 28, 8 
00000000" 00764 ADDRESS P.AFF 
00 OD 06 01 00768 "BYTE 1, 6, 13, 0 
0006 0017 076¢ “WORD 38 é 
00# 00770 BYTE C12) 
00000000' 0077¢ ADDRESS P.AFG 
00 OF 09 00 00780 BYTE 0, 9, 14, 0 
0002 0016 00784 "wORD 28, 2 
00788 BLKB 12 


PSECT SUMMARY 


Name Bytes Attributes 
_FOLSPLIT 3120 NOVEC,NOWRT, RD ,NOEXE, SHR, LCL, REL, CON, PIC,ALIGN(2) 
_F DLSGLOBAL 1940 NOVEC, WRT, RD ,NOEXE,NOSHR, LCL, REL, CON, PIC,ALIGN(2) 
Library Statistics 
oncnsies Symbols -------- Pages Processing 
File Total Loaded Percent Mapped Time 
-$255$DUA28: CSYSLIBISTARLET.L32;1 9776 130 1 581 00:01.0 


COMMAND QUALIFIERS 
BLISS/CHECK=(FIELD, INITIAL ,OPTIMIZE)/LIS=LIS$:FDLGENTAB/OBJ=OBJ$:FDLGENTAB MSRC$:FDLGENTAB/UPDATE=(ENHS: Ff DLGENTAB) 
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ileal timer 
Lines/CPU Min: 


VA¥=11 FOL Utilities 


0 code + 3060 data bytes 
0106.1 
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99 
A fy me 1 


Compal Used: pages 
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